home *** CD-ROM | disk | FTP | other *** search
/ Fritz: All Fritz / All Fritz.zip / All Fritz / FILES / MUSIUSIC / PLAYERS.LZH / PC_SOUND.LIB < prev    next >
Text File  |  1991-01-07  |  384b  |  16 lines
  1. with system;
  2. with voc_data;
  3.  
  4. package pc_sound is
  5.  
  6. subtype sample_rates is natural range 19 .. integer'last;
  7.  
  8. procedure set_sample_rate(samples_per_second:in sample_rates);
  9.  
  10. procedure playback(sound:in system.address;sound_length:in natural);
  11.  
  12. private
  13.   memory_model:constant:=1;
  14.  
  15. end pc_sound;
  16.